home *** CD-ROM | disk | FTP | other *** search
/ Workbench Design / WB Collection.iso / workbench werkzeuge / scherz programme / pointereyesv4.3&3.11 / pointereyes4.3 / install next >
Text File  |  1996-04-07  |  3KB  |  107 lines

  1. ;
  2. ; $PROJECT: PointerEyes 4.3
  3. ;
  4. ; (C) Copyright 1995 John Hughes.  All Rights Reserved.
  5. ;
  6.  
  7. (if (< (/ (getversion) 65536) 39)  ;if this is OS2.x
  8.   (
  9.     (message "\n\nPointerEyes 4.x is for AmigaDos 3.0 or greater.\n\nPlease install version 3.x.")
  10.     (exit (quiet))
  11.   )
  12. )
  13.  
  14. (message "\n\nIf PointerEyes is currently running, please quit it before continuing.  The installation may not work properly if Pointer Eyes is running.")
  15.  
  16. (set mode
  17.       (askchoice
  18.             (prompt @app-name)
  19.             (help @askchoice-help)
  20.             (choices "Install" "Remove")
  21.       )
  22. )
  23.  
  24. (if mode
  25.           (set pmode "Remove")
  26.           (set pmode "Install")
  27. )
  28.  
  29. ; GET INSTALL DIRECTORY
  30. (set installdir
  31.           (askdir
  32.                      (prompt "Where do you want to put the PointerEyes executable?")
  33.                      (help @askdir-help)
  34.                      (default "SYS:WBStartup")
  35.           )
  36. )
  37.  
  38. ; do install or remove
  39. (if mode
  40.           ; Remove
  41.           (
  42.                      (working "Removing " @app-name)
  43.  
  44.                      ; Remove the non-standard pieces
  45.                      (delete (tackon installdir "PointerEyes") (infos))
  46.                      (delete (tackon installdir  "PointerEyesImages/OriginalEyes.8") (infos))
  47.                      (delete (tackon installdir  "PointerEyesImages/OriginalEyes.11") (infos))
  48.                      (delete (tackon installdir  "PointerEyesImages/OriginalEyes.13") (infos))
  49.                      (delete (tackon installdir  "PointerEyesImages/MagicWBEyes.8") (infos))
  50.                      (delete (tackon installdir  "PointerEyesImages/MagicWBEyes.11") (infos))
  51.                      (delete (tackon installdir  "PointerEyesImages/MagicWBEyes.13") (infos))
  52.                      (delete (tackon installdir  "PointerEyesImages/ShadedEyes.8") (infos))
  53.                      (delete (tackon installdir  "PointerEyesImages/ShadedEyes.11") (infos))
  54.                      (delete (tackon installdir  "PointerEyesImages/ShadedEyes.13") (infos))
  55.                      (delete (tackon installdir  "PointerEyesImages/RedYellowEyes.11") (infos))
  56.                      (delete (tackon installdir  "PointerEyesImages/DiamondEyes.11") (infos))
  57.                      (delete (tackon installdir  "PointerEyesImages") (infos))
  58.  
  59.                      (message "Pointer Eyes has been successfully removed.\nscreennotify.library was left in libs: since\nother applications you have may need it.")
  60.                      (exit (quiet))
  61.           )
  62.  
  63.           ; Install
  64.           (
  65.                      (working "Installing " @app-name)
  66.  
  67.                      ; Install the Executable
  68.                      (copyfiles
  69.                                 (prompt "Copying the PointerEyes Executable")
  70.                                 (help @copyfiles-help)
  71.                                 (source "PointerEyes")
  72.                                 (dest installdir)
  73.                                 (infos)
  74.                      )
  75.  
  76.                      ; Install the library
  77.                      (copylib
  78.                                 (prompt "Copying screennotify.library")
  79.                                 (help @copylib-help)
  80.                                 (source "/libs/screennotify.library")
  81.                                 (dest "libs:")
  82.                                 (confirm)
  83.                      )
  84.  
  85.                      ; Install the Image directory
  86.                      (copyfiles
  87.                                 (prompt "Copying the Image Directory")
  88.                                 (help @copyfiles-help)
  89.                                 (source "PointerEyesImages")
  90.                                 (dest (tackon installdir "PointerEyesImages"))
  91.                                 (pattern "#?")
  92.                      )
  93.  
  94.                      ; install AmigaGuide file
  95.                      (copyfiles
  96.                                 (prompt "Copying AmigaGuide file")
  97.                                 (help @copyfiles-help)
  98.                                 (source "/Docs/PointerEyes.guide")
  99.                                 (dest "AmigaGuide:")
  100.                                 (confirm)
  101.                      )
  102.  
  103.           )
  104. )
  105.  
  106. (set @default-dest installdir)
  107.